From: Stefan Monnier <monnier@iro.umontreal.ca>
Date: Tue, 9 Mar 2021 18:04:14 +0000 (-0500)
Subject: * src/buffer.c (Fbuffer_swap_text): Swap `mark-active` as well
X-Git-Tag: archive/raspbian/1%29.2+1-2+rpi1^2~5^2~18^2~3602
X-Git-Url: https://dgit.raspbian.org/%22http:/www.example.com/cgi/%22https:/www.github.com/%22bookmarks:///%22http:/www.example.com/cgi/%22https:/www.github.com/%22bookmarks:/?a=commitdiff_plain;h=c6ed17cc70ee49250f7d3999bb56918f0e925757;p=emacs.git

* src/buffer.c (Fbuffer_swap_text): Swap `mark-active` as well

This avoids undesirable situations where `mark-active` is set even
though the `mark` isn't.
---

diff --git a/src/buffer.c b/src/buffer.c
index 03c10cc7ae5..8e33162989b 100644
--- a/src/buffer.c
+++ b/src/buffer.c
@@ -2419,6 +2419,7 @@ results, see Info node `(elisp)Swapping Text'.  */)
   swapfield (overlay_center, ptrdiff_t);
   swapfield_ (undo_list, Lisp_Object);
   swapfield_ (mark, Lisp_Object);
+  swapfield_ (mark_active, Lisp_Object); /* Belongs with the `mark'.  */
   swapfield_ (enable_multibyte_characters, Lisp_Object);
   swapfield_ (bidi_display_reordering, Lisp_Object);
   swapfield_ (bidi_paragraph_direction, Lisp_Object);